Script: --on windowEvent wdID,wdName,objNo,objName,objValue┬┬if objValue="Open" then ┬ ┬else if objValue="Close" then ┬ ┬else if objValue="Suspend" then ┬ ┬else if objValue="Resume" then ┬ ┬else if objValue="CloseBox" then ┬ ┬else if objValue="ZoomBox" then ┬ ┬else if objValue="GrowBox" then ┬ ┬else if objValue="TitleBar" then ┬ ┬end if┬┬--end windowEvent
ItemType: LIST
Rect: 8,8,425,210
TextFont: Geneva
TextSize: 9
Name: ICN#List
Style: ListOfFinderIcons
Logic: Single
KeyScroll: TRUE
Text:
Script: --on mouseUp wdID,wdName,objNo,objName,objValue┬global windowName┬put i1_Selection of window wdName into x┬set i3_Text of window wdName to line x of pList┬wait 10┬if the mouseClick then┬ if i3_Text of window wdName ¡ empty then┬ put i3_Text of window wdName into windowName┬ close window wdName┬ put TRUE into newPict┬ end if┬end if┬--end mouseUp